﻿Public Class frm_menu

    Private Sub Form_Menu_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Me.Show()
        Me.WindowState = FormWindowState.Maximized
    End Sub

    Private Sub cmd_salir_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        End
    End Sub

    Private Sub opc_abmProd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        frm_prod.Show()
    End Sub

    Private Sub opc_venta_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        frm_venta.Show()
    End Sub

    Private Sub cmd_usuarios_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        frm_usuarios.Show()
    End Sub

    Private Sub cmd_buscarVenta_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        frm_cambio.Show()
    End Sub

    Private Sub ProductoToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ProductoToolStripMenuItem.Click
        frm_prod.Show()
    End Sub

    Private Sub NuevaVentaToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NuevaVentaToolStripMenuItem.Click
        frm_venta.Show()
    End Sub

    Private Sub ProveedorToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ProveedorToolStripMenuItem.Click
        frm_proveedor.Show()
    End Sub

    Private Sub EmpleadoToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles EmpleadoToolStripMenuItem.Click
        frm_empleados.Show()
    End Sub

    Private Sub TelaToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TelaToolStripMenuItem.Click
        frm_tipoTela.Show()
    End Sub

    Private Sub CambioToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CambioToolStripMenuItem.Click
        frm_cambio.Show()
        frm_cambio.cargarForm(True)
    End Sub

    Private Sub NuevaCompraToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NuevaCompraToolStripMenuItem.Click
        frm_compra.Show()
    End Sub

    Private Sub ProductosToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ProductosToolStripMenuItem.Click
        frm_reporteProd.Show()
    End Sub

    Private Sub ProveedoresToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ProveedoresToolStripMenuItem.Click
        frm_reporteProveedor.Show()
    End Sub

    Private Sub DevoluciónToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DevoluciónToolStripMenuItem.Click
        frm_cambio.Show()
        frm_cambio.cargarForm(False)
    End Sub

    Private Sub VentasToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles VentasToolStripMenuItem.Click
        frm_reporteVentas.Show()
    End Sub

    Private Sub ProductosToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ProductosToolStripMenuItem1.Click
        frm_consultarProductos.Show()
    End Sub

    Private Sub ComprasToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComprasToolStripMenuItem.Click
        frm_reporteCompra.Show()
    End Sub

    Private Sub ToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripMenuItem1.Click
        frm_reporteEmpleados.Show()
    End Sub

    Private Sub GananciasToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles GananciasToolStripMenuItem.Click
        frm_ganancias.Show()
    End Sub

    Private Sub TarjetaToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TarjetaToolStripMenuItem.Click
        Frm_reportesTarjeta.Show()
    End Sub

    Private Sub SalirToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SalirToolStripMenuItem.Click
        Me.Close()
    End Sub
End Class